%% Set constants for V6_exp function

tau_1 = 16;
tau_2 = 5;
A_const = 10;

time_min = -10;
time_max = 100;
time_step = 1;

time = time_min : time_step : time_max;

%% Set constants for V6_filter function
L_const = 6;
K_const = 13;
M1_const = 16;
M2_const = 1;

%% Calculation of functions

exponent = V6_exp( tau_1, tau_2, A_const, time );
filter = V6_filter( exponent, L_const, K_const, M1_const, M2_const);

%% Draw graph of functions

plot(time, exponent, 'b', time, filter, 'r');

%%
pause();
close();